home *** CD-ROM | disk | FTP | other *** search
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was processed as: AMOS Basic Source Code Archive
(archive/amosSrc).
You can browse this item here: MaskCopy.AMOS
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 4d 4f 53 20 42 61 73 | 69 63 20 76 31 33 34 20 |AMOS Bas|ic v134 |
|00000010| 00 00 08 9e 1f 01 06 52 | 00 36 20 2a 2a 2a 2a 2a |.......R|.6 *****|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000040| 20 43 6f 6d 6d 61 6e 64 | 73 20 75 73 65 64 3a 20 | Command|s used: |
|00000050| 00 00 1d 01 06 52 00 32 | 20 2a 20 20 20 20 20 20 |.....R.2| * |
|00000060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 20 4d | | * M|
|00000080| 61 73 6b 20 43 6f 70 79 | 20 20 00 00 1b 01 06 52 |ask Copy| .....R|
|00000090| 00 2e 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 41 |.. * | A|
|000000a0| 6d 63 61 66 20 45 78 61 | 6d 70 6c 65 73 20 20 20 |mcaf Exa|mples |
|000000b0| 20 20 20 20 20 20 20 2a | 20 46 63 69 72 63 6c 65 | *| Fcircle|
|000000c0| 00 00 1c 01 06 52 00 30 | 20 2a 20 20 20 20 20 20 |.....R.0| * |
|000000d0| 20 20 20 20 20 4d 61 73 | 6b 20 43 6f 70 79 20 56 | Mas|k Copy V|
|000000e0| 31 2e 30 20 20 20 20 20 | 20 20 20 20 20 2a 20 46 |1.0 | * F|
|000000f0| 65 6c 6c 69 70 73 65 20 | 00 00 22 01 06 52 00 3c |ellipse |.."..R.<|
|00000100| 20 2a 20 20 20 20 20 20 | 57 72 69 74 74 65 6e 20 | * |Written |
|00000110| 62 79 20 43 68 72 69 73 | 20 48 6f 64 67 65 73 20 |by Chris| Hodges |
|00000120| 20 20 20 20 20 2a 20 28 | 42 6c 69 74 74 65 72 20 | * (|Blitter |
|00000130| 43 6f 70 79 20 4c 69 6d | 69 74 29 20 00 00 1f 01 |Copy Lim|it) ....|
|00000140| 06 52 00 36 20 2a 20 20 | 20 20 20 20 20 20 20 20 |.R.6 * | |
|00000150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000160| 20 20 20 20 20 20 20 20 | 20 2a 20 28 42 6c 69 74 | | * (Blit|
|00000170| 74 65 72 20 43 6f 70 79 | 29 20 00 00 1d 01 06 52 |ter Copy|) .....R|
|00000180| 00 32 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.2 *****|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 2a 2a 2a 2a 2a 2a | 20 28 3d 42 69 6e 6c 6f |********| (=Binlo|
|000001b0| 67 29 20 20 00 00 04 01 | 06 52 00 00 00 00 1a 01 |g) ....|.R......|
|000001c0| 06 52 00 2c 20 4c 6f 61 | 64 20 61 6e 20 69 66 66 |.R., Loa|d an iff|
|000001d0| 20 70 69 63 74 75 72 65 | 20 61 6e 64 20 68 69 64 | picture| and hid|
|000001e0| 65 20 69 74 20 66 72 6f | 6d 20 76 69 65 77 2e 20 |e it fro|m view. |
|000001f0| 00 00 13 01 17 d4 00 26 | 00 0f 44 61 74 61 2f 57 |.......&|..Data/W|
|00000200| 65 61 7a 6c 65 2e 69 66 | 66 00 00 5c 00 3e 00 00 |eazle.if|f..\.>..|
|00000210| 00 00 00 54 0a ae 00 00 | 1d 01 06 52 00 32 20 4e |...T....|...R.2 N|
|00000220| 6f 77 20 67 65 74 20 73 | 63 72 65 65 6e 20 64 69 |ow get s|creen di|
|00000230| 6d 65 6e 73 69 6f 6e 73 | 20 61 6e 64 20 6e 75 6d |mensions| and num|
|00000240| 62 65 72 20 6f 66 20 63 | 6f 6c 6f 75 72 73 2e 20 |ber of c|olours. |
|00000250| 00 00 0f 01 00 06 00 00 | 02 00 77 78 ff a2 0b 58 |........|..wx...X|
|00000260| 00 54 00 06 00 00 02 00 | 77 79 ff a2 0b 74 00 00 |.T......|wy...t..|
|00000270| 08 01 00 06 00 00 02 00 | 61 63 ff a2 0a 5e 00 00 |........|ac...^..|
|00000280| 2a 01 06 52 00 4c 20 4f | 70 65 6e 20 61 20 73 63 |*..R.L O|pen a sc|
|00000290| 72 65 65 6e 20 74 6f 20 | 68 6f 6c 64 20 74 68 65 |reen to |hold the|
|000002a0| 20 6d 61 73 6b 2e 20 53 | 61 6d 65 20 73 69 7a 65 | mask. S|ame size|
|000002b0| 20 61 73 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c | as the |original|
|000002c0| 20 70 69 63 74 75 72 65 | 20 62 75 74 20 6f 6e 6c | picture| but onl|
|000002d0| 79 20 00 00 0b 01 06 52 | 00 0e 20 74 77 6f 20 63 |y .....R|.. two c|
|000002e0| 6f 6c 6f 75 72 73 2e 20 | 00 00 1a 01 09 ea 00 3e |olours. |.......>|
|000002f0| 00 00 00 02 00 5c 00 06 | 00 00 02 00 77 78 00 5c |.....\..|....wx.\|
|00000300| 00 06 00 00 02 00 77 79 | 00 5c 00 3e 00 00 00 02 |......wy|.\.>....|
|00000310| 00 5c 00 3e 00 00 00 00 | 00 54 0a ae 00 00 11 01 |.\.>....|.T......|
|00000320| 14 46 00 54 0d 34 00 54 | 13 dc 00 3e 00 00 00 00 |.F.T.4.T|...>....|
|00000330| 00 54 13 d2 00 3e 00 00 | 00 01 00 54 0b ae 00 00 |.T...>..|...T....|
|00000340| 2b 01 06 52 00 4e 20 4f | 70 65 6e 20 61 20 73 63 |+..R.N O|pen a sc|
|00000350| 72 65 65 6e 20 74 6f 20 | 63 6f 70 79 20 74 68 65 |reen to |copy the|
|00000360| 20 6e 65 77 20 69 6d 61 | 67 65 20 6f 6e 74 6f 2e | new ima|ge onto.|
|00000370| 20 41 67 61 69 6e 20 74 | 68 65 20 73 61 6d 65 20 | Again t|he same |
|00000380| 73 69 7a 65 2c 20 62 75 | 74 20 74 68 69 73 20 74 |size, bu|t this t|
|00000390| 69 6d 65 20 00 00 0d 01 | 06 52 00 12 20 77 69 74 |ime ....|.R.. wit|
|000003a0| 68 20 41 43 20 63 6f 6c | 6f 75 72 73 2e 20 00 00 |h AC col|ours. ..|
|000003b0| 19 01 09 ea 00 3e 00 00 | 00 01 00 5c 00 06 00 00 |.....>..|...\....|
|000003c0| 02 00 77 78 00 5c 00 06 | 00 00 02 00 77 79 00 5c |..wx.\..|....wy.\|
|000003d0| 00 06 00 00 02 00 61 63 | 00 5c 00 3e 00 00 00 00 |......ac|.\.>....|
|000003e0| 00 00 11 01 14 46 00 54 | 0d 34 00 54 13 dc 00 3e |.....F.T|.4.T...>|
|000003f0| 00 00 00 00 00 54 13 d2 | 00 3e 00 00 00 01 00 54 |.....T..|.>.....T|
|00000400| 0b ae 00 00 19 01 06 52 | 00 2a 20 43 6f 70 79 20 |.......R|.* Copy |
|00000410| 74 68 65 20 70 61 6c 65 | 74 74 65 20 6f 66 20 74 |the pale|tte of t|
|00000420| 68 65 20 6f 72 69 67 69 | 6e 61 6c 20 70 69 63 74 |he origi|nal pict|
|00000430| 75 72 65 20 00 00 06 01 | 0b 90 00 3e 00 00 00 00 |ure ....|...>....|
|00000440| 00 00 16 01 06 52 00 24 | 20 44 6f 75 62 6c 65 20 |.....R.$| Double |
|00000450| 62 75 66 66 65 72 20 74 | 6f 20 61 76 6f 69 64 20 |buffer t|o avoid |
|00000460| 66 6c 69 63 6b 65 72 69 | 6e 67 2e 20 00 00 03 01 |flickeri|ng. ....|
|00000470| 01 2c 00 00 06 01 0e 2c | 00 3e 00 00 00 00 00 00 |.,.....,|.>......|
|00000480| 25 01 06 52 00 42 20 4e | 6f 77 20 63 61 6c 63 75 |%..R.B N|ow calcu|
|00000490| 6c 61 74 65 20 74 68 65 | 20 6d 69 64 64 6c 65 20 |late the| middle |
|000004a0| 6f 66 20 74 68 65 20 73 | 63 72 65 65 6e 2e 20 41 |of the s|creen. A|
|000004b0| 63 74 69 76 61 74 65 20 | 74 68 65 20 6d 61 73 6b |ctivate |the mask|
|000004c0| 2d 73 63 72 65 65 6e 2e | 00 00 06 01 0c 6e 00 3e |-screen.|.....n.>|
|000004d0| 00 00 00 02 00 00 1d 01 | 00 06 00 00 02 00 6d 78 |........|......mx|
|000004e0| ff a2 00 06 00 00 02 00 | 77 78 ff ec 00 3e 00 00 |........|wx...>..|
|000004f0| 00 02 00 54 00 06 00 00 | 02 00 6d 79 ff a2 00 06 |...T....|..my....|
|00000500| 00 00 02 00 77 79 ff ec | 00 3e 00 00 00 02 00 00 |....wy..|.>......|
|00000510| 19 01 02 3c 00 00 00 06 | 00 00 02 00 61 00 ff a2 |...<....|....a...|
|00000520| 00 3e 00 00 00 01 00 94 | 00 06 00 00 02 00 6d 78 |.>......|......mx|
|00000530| ff ca 00 3e 00 00 00 13 | 03 56 00 3e 00 00 00 04 |...>....|.V.>....|
|00000540| 00 00 21 03 06 52 00 3a | 20 44 72 61 77 20 73 6f |..!..R.:| Draw so|
|00000550| 6d 65 20 67 66 78 20 6f | 6e 74 6f 20 74 68 65 20 |me gfx o|nto the |
|00000560| 6d 61 73 6b 20 73 63 72 | 65 65 6e 2e 20 54 68 65 |mask scr|een. The|
|00000570| 73 65 20 61 72 65 20 32 | 2d 63 6f 6c 6f 75 72 65 |se are 2|-coloure|
|00000580| 64 2e 00 00 13 03 00 4e | 08 00 05 e6 00 06 00 00 |d......N|........|
|00000590| 02 00 6d 78 00 5c 00 06 | 00 00 02 00 6d 79 00 5c |..mx.\..|....my.\|
|000005a0| 00 06 00 00 02 00 61 00 | 00 00 1e 03 00 4e 08 00 |......a.|.....N..|
|000005b0| 05 f8 00 3e 00 00 00 00 | 00 5c 00 3e 00 00 00 00 |...>....|.\.>....|
|000005c0| 00 5c 00 06 00 00 02 00 | 61 00 ff ec 00 3e 00 00 |.\......|a....>..|
|000005d0| 00 02 ff c0 00 3e 00 00 | 00 01 00 5c 00 06 00 00 |.....>..|...\....|
|000005e0| 02 00 61 00 00 00 23 03 | 00 4e 08 00 05 f8 00 06 |..a...#.|.N......|
|000005f0| 00 00 02 00 77 78 ff ca | 00 3e 00 00 00 01 00 5c |....wx..|.>.....\|
|00000600| 00 3e 00 00 00 00 00 5c | 00 06 00 00 02 00 61 00 |.>.....\|......a.|
|00000610| ff ec 00 3e 00 00 00 02 | ff c0 00 3e 00 00 00 01 |...>....|...>....|
|00000620| 00 5c 00 06 00 00 02 00 | 61 00 00 00 23 03 00 4e |.\......|a...#..N|
|00000630| 08 00 05 f8 00 3e 00 00 | 00 00 00 5c 00 06 00 00 |.....>..|...\....|
|00000640| 02 00 77 79 ff ca 00 3e | 00 00 00 01 00 5c 00 06 |..wy...>|.....\..|
|00000650| 00 00 02 00 61 00 ff ec | 00 3e 00 00 00 02 ff c0 |....a...|.>......|
|00000660| 00 3e 00 00 00 01 00 5c | 00 06 00 00 02 00 61 00 |.>.....\|......a.|
|00000670| 00 00 28 03 00 4e 08 00 | 05 f8 00 06 00 00 02 00 |..(..N..|........|
|00000680| 77 78 ff ca 00 3e 00 00 | 00 01 00 5c 00 06 00 00 |wx...>..|...\....|
|00000690| 02 00 77 79 ff ca 00 3e | 00 00 00 01 00 5c 00 06 |..wy...>|.....\..|
|000006a0| 00 00 02 00 61 00 ff ec | 00 3e 00 00 00 02 ff c0 |....a...|.>......|
|000006b0| 00 3e 00 00 00 01 00 5c | 00 06 00 00 02 00 61 00 |.>.....\|......a.|
|000006c0| 00 00 27 03 06 52 00 46 | 20 4e 6f 77 20 63 6f 70 |..'..R.F| Now cop|
|000006d0| 79 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 73 |y the or|iginal s|
|000006e0| 63 72 65 65 6e 20 74 6f | 20 74 68 65 20 6e 65 77 |creen to| the new|
|000006f0| 20 6f 6e 65 2c 20 75 73 | 69 6e 67 20 74 68 65 20 | one, us|ing the |
|00000700| 74 65 6d 70 6c 61 74 65 | 20 66 72 6f 6d 20 00 00 |template| from ..|
|00000710| 09 03 06 52 00 0a 20 53 | 63 72 65 65 6e 20 32 2e |...R.. S|creen 2.|
|00000720| 00 00 13 03 00 4e 08 00 | 08 6c 00 3e 00 00 00 00 |.....N..|.l.>....|
|00000730| 00 94 00 3e 00 00 00 01 | 00 5c 01 ba 00 74 00 3e |...>....|.\...t.>|
|00000740| 00 00 00 00 00 7c 00 00 | 26 03 06 52 00 44 20 50 |.....|..|&..R.D P|
|00000750| 53 3a 20 61 20 6e 69 63 | 65 20 72 65 70 6c 61 63 |S: a nic|e replac|
|00000760| 65 6d 65 6e 74 20 72 6f | 75 74 69 6e 65 20 66 6f |ement ro|utine fo|
|00000770| 72 20 4d 61 73 6b 20 43 | 6f 70 79 2e 20 54 65 73 |r Mask C|opy. Tes|
|00000780| 74 20 69 74 2c 20 69 74 | 27 73 20 66 61 73 74 65 |t it, it|'s faste|
|00000790| 72 21 00 00 0f 01 06 52 | 00 16 20 20 42 6c 69 74 |r!.....R|.. Blit|
|000007a0| 74 65 72 20 43 6f 70 79 | 20 4c 69 6d 69 74 20 30 |ter Copy| Limit 0|
|000007b0| 00 00 11 01 06 52 00 1a | 20 20 46 6f 72 20 42 3d |.....R..| For B=|
|000007c0| 30 20 54 6f 20 42 69 6e | 6c 6f 67 28 41 43 29 2d |0 To Bin|log(AC)-|
|000007d0| 31 20 00 00 19 01 06 52 | 00 2a 20 20 20 20 42 6c |1 .....R|.* Bl|
|000007e0| 69 74 74 65 72 20 43 6f | 70 79 20 30 2c 42 2c 32 |itter Co|py 0,B,2|
|000007f0| 2c 30 20 54 6f 20 31 2c | 42 2c 25 31 31 30 30 30 |,0 To 1,|B,%11000|
|00000800| 30 30 30 20 00 00 08 01 | 06 52 00 08 20 20 4e 65 |000 ....|.R.. Ne|
|00000810| 78 74 20 20 00 00 10 03 | 06 52 00 18 20 44 69 73 |xt ....|.R.. Dis|
|00000820| 70 6c 61 79 20 74 68 65 | 20 6e 65 77 20 73 63 72 |play the| new scr|
|00000830| 65 65 6e 2e 00 00 08 03 | 0a e2 00 3e 00 00 00 01 |een.....|...>....|
|00000840| 00 54 0c ca 00 00 03 01 | 02 46 00 00 21 01 06 52 |.T......|.F..!..R|
|00000850| 00 3a 20 4c 61 73 74 20 | 66 72 61 6d 65 3a 20 43 |.: Last |frame: C|
|00000860| 6f 70 79 20 74 68 65 20 | 77 68 6f 6c 65 20 73 63 |opy the |whole sc|
|00000870| 72 65 65 6e 20 74 6f 20 | 63 6f 6d 70 6c 65 74 65 |reen to |complete|
|00000880| 20 74 68 65 20 69 6d 61 | 67 65 2e 20 00 00 0a 01 | the ima|ge. ....|
|00000890| 09 86 00 3e 00 00 00 00 | 00 94 00 3e 00 00 00 01 |...>....|...>....|
|000008a0| 00 00 08 01 0a e2 00 3e | 00 00 00 01 00 54 0c ca |.......>|.....T..|
|000008b0| 00 00 41 6d 42 73 00 00 | |..AmBs..| |
+--------+-------------------------+-------------------------+--------+--------+
